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SCROLLING=*AUT0" NAME-'Hanager" MARGINWIDTH="2" HARGINHEIGHT='20"'> 
CFRAME SRO'Menu. htm* 

SCROLLING="AUTO* NAME="View" MARGINWIDTH=*2* MARGINHEIGHT^"20~> 
</FBAMESET> 
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Manager, asp 



<HIUL> 

CSCRTFT lafigna8*=~VB$ci-ipt'> 
<! — 9INQJDDE FD^'CanBoraiyuu. asp*— > 
<!— #INCUIDE FILE^AnshouNyuuryokn. asp*— > 
<! — ffDtCLODE FH£=^HostSoajtisiiiii. asp*— > 
<!— ttNCUUDE FIL&=*2andakaHyouji. asp*— > 
<!-#INCUIDE FILE^*BaitaH&etorf.asp*— > 
<!-HHHOina5 FILE=*Saikaishi. asp*— > 
<!— QWCUm FILE^Shougai. asp*— > 

Sub Manager ( Ka&agerlD, CoutentsParts, Code > 
If ( Code = ~Rt$~ ) then 

sbougai *^^- h'. -mmm^ 

End If 

Select Case ManagerlD 
Case "2Kft68&* 
Select Case CoutentsParts 
Case *^^— f* 

CardSotmyuu *— h* t *JJW55I1^* 
Case -*-WA^V 
Select Case Code 
Case **&S**T* 

AnshouNy uury oku ^ l* *, *flliftfi54fe* 
Case ~?¥SB&~ 

Saikaishi *;*^-h*. *«ift^* 
End Select 
Case *98m*Jj~ 
Select Case Code 
Case -tm*±T~ 
BostSoojushin *;*^— b% *JW5fiB£* 

case -mmw 

Saikaishi ***—»**, 
End Select 
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Select Case Code 

case m mtmr 

ZandakaHyouji *>^^ r — 
Case *?*»#* 

Saikaishi *^^-h*. *«*«£* 
End Select 

case *«•«*** 

Select Case Code 
Case **ya**T* 

BaitaiUketori **^— V. *WMB£* 
Case ~f?Hft* 

saikaishi ***-b*. *aaw^* 

End Select 

case ~m»&m%- 

Select Case Code 
End Select 
End Select 
Case"fW§#&* 
Select Case Code 
End Select 
End Select 
End Select 
End Sub 
</SOUPT> 
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